﻿Public Class _Default
    Inherits Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Load

    End Sub

    Protected Sub btn_Calculate_Click(sender As Object, e As EventArgs) Handles btn_Calculate.Click

        Dim firstnumber, secondnumber As Single
        firstnumber = CSng(tb_Firstnumber.Text)
        secondnumber = CSng(tb_Secondnumber.Text)
        Dim result As Single
        result = firstnumber + secondnumber
        lbl_display.Text = CStr(result)

    End Sub
End Class